home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / comp / fetob.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  464 b   |  20 lines
  1. /*
  2.                                 F E T O B . C
  3.  
  4.              Force conversion of expression to boolean expression
  5. */
  6.  
  7. #include "iccomp.h"
  8.  
  9. void fetob(e)
  10.     ESTRUC_
  11.         *e;
  12. {
  13.     if (test_type(e, e_bool))
  14.         return;                             /* done if boolean aloready */
  15.  
  16.     etoc(e);                            /* convert to code unless bool */
  17.     gencode (e, op_jmp_true);
  18.     gencode (e, op_jmp, j_falselist);
  19.     set_type(e, e_code | e_bool);
  20. }